home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
EnigmA Amiga Run 1995 November
/
EnigmA AMIGA RUN 02 (1995)(G.R. Edizioni)(IT)[!][issue 1995-11][Skylink CD].iso
/
earcd
/
util
/
text
/
quilldem.lha
/
Demo
/
Rexx
/
EnterASCII.quill
< prev
next >
Wrap
Text File
|
1995-08-29
|
430b
|
30 lines
/**
** $VER: EnterASCII.quill 1.0 (30.9.94)
** By Timothy J. Aston
**
** Prompts you for an ASCII value to insert at the current cursor
** position
**
**/
/* Some setup first.
*/
options results
options failat 200
TAB = d2c(9)
main:
'REQUESTNUMBER' '"Enter an ASCII value to insert (precede hex by 0x)"'
if rc = 0 then do
'TEXT' d2c(result)
end
else do
'SETSTATUSBAR' '"Operation cancelled"'
end
exit